-- card: 10772 from stack: in
-- bmap block id: 21382
-- flags: 4000
-- background id: 8902
-- name: open door
----- HyperTalk script -----
on opencard
  put "Yes, you guessed it.  This is an open door." into field "info"
  pass opencard
end opencard


-- part 1 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=161 top=302 right=323 bottom=192
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: OK
----- HyperTalk script -----
on mouseUp
  global filter
  if filter is "yes" then
    beep
    exit mouseup
  end if
  global donteat
  get bkgnd field "do what"
  if the number of words in it > 1 then
    beep 2
    oneword
    exit mouseup
  end if
  if it contains "open" then
    put "It is already open." into field "info"
    exit mouseup
  end if
  if it contains "close" or it contains "push" or it contains "knock" then
    put "It closes and locks with a click."&return & "   Good going.  You have just locked yourself in "& "the cell, where you spent the rest of your life regretting "& "that action.Ÿ" into field "info"
    global filter
    put "yes" into filter
    exit mouseup
  end if
  if it contains "examine" or it contains "look" then
    send "opencard" to this card
    exit mouseup
  end if
  if it contains "hit" or it contains "kick" or it contains "punch" then
    play "boing"
    put "When you hit the door, it slams shut."& return & "   Good going.  You have just locked yourself in "& "the cell, where you spent the rest of your life regretting "& "that action.Ÿ" into field "info"
    global filter
    put "yes" into filter
    exit mouseup
  end if
  if it contains "get" or it contains "move" then
    put "You give up once you realize"& " that you are not strong enough to rip the door off its hinges." into field "info"
    exit mouseup
  end if
  if it contains "eat" or it contains "consume" then
    put donteat into field "info"
    exit mouseup
  end if
  if it contains "go" then
    send "mouseup" to bkgnd button "done"
    send "mouseup" to bkgnd button "north"
    exit mouseup
  end if
  if it is "" then
    put "Speak up.  I can't hear you." into field "info"
    exit mouseup
  end if
  idunno
end mouseUp

on cont
  global filter
  if filter is "yes" then go to card "death"
  put "" into filter
end cont



-- part contents for background part 2
----- text -----
What would you like to do with the open door?

-- part contents for background part 7
----- text -----
Open Door